﻿Imports System.Web
Imports System.Web.Services

Public Class Ajax
    Implements System.Web.IHttpHandler

    Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest
        Dim strAddr As String = context.Request("Addr")
        Dim strIp As String = context.Request("IP")
        Dim obj As New BL()
        obj.insertDate(strIp.Trim(), strAddr.Trim())

        context.Response.Write("Hello World!")

    End Sub

    ReadOnly Property IsReusable() As Boolean Implements IHttpHandler.IsReusable
        Get
            Return False
        End Get
    End Property

End Class